libname ya211 'D:\ya211';

data tilp94;
set ya211.tp8605(keep=(syrtun tphenk tplv kaytom) where=(vuosi="1994"));
rename tphenk=hk94 tplv=lvti94 kaytom=kaytom94;
run;

proc export data=tilp94
   outfile="tilp94vars.csv"
   dbms=csv
   replace;
 run;

